home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 10 - 1994 / 10.01 Jan 94 / Color Buttons / Application.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-07-16  |  888 b   |  61 lines  |  [TEXT/KAHL]
  1. CTabHandle CtrlCTab;
  2. Handle myCDEF;
  3.  
  4.  
  5. main()
  6. {
  7.     InitGraf(&thePort);
  8.     InitFonts();
  9.     FlushEvents(everyEvent,0);
  10.     InitWindows();
  11.     InitMenus();
  12.     TEInit();
  13.     InitDialogs(0L);
  14.     MaxApplZone(); 
  15.     MoreMasters(); 
  16.     MoreMasters(); 
  17.  
  18.     Setup(); 
  19.     InitCursor();
  20.     ShowNeatoButtons();
  21. }
  22.  
  23. Setup()
  24. {
  25.     CtrlCTab=(CTabHandle)GetResource('cctb',128); 
  26.     myCDEF=GetResource('CDEF',32); 
  27. }
  28.  
  29. ShowNeatoButtons()
  30. {
  31.     DialogPtr d;
  32.     int i;
  33.  
  34.     d=GetNewDialog(128,0L,(Ptr)-1L);
  35.     for(i=1;i<3;i++)ConvertToColorButtons(d,i);
  36.     ShowWindow(d);
  37.     SelectWindow(d);
  38.     ModalDialog(0L,&i);
  39.     ExitToShell(); 
  40. }
  41.  
  42. ConvertToColorButtons(d,i)
  43. DialogPtr d;
  44. int i; 
  45. {
  46.     int j; 
  47.     Handle tItem; 
  48.     Rect box; 
  49.     char n[31];
  50.  
  51.     GetDItem(d,i,&j,&tItem,&box);
  52.     if(j==ctrlItem+btnCtrl || 
  53.         j==ctrlItem+btnCtrl+itemDisable){
  54.         SetCtlColor(tItem,CtrlCTab);
  55.         (**((ControlHandle)tItem)).contrlDefProc=myCDEF;
  56.         j&=127;
  57.         SetDItem(d,i,j,tItem,&box); 
  58.     }
  59. }
  60.  
  61.